home *** CD-ROM | disk | FTP | other *** search
- object ListViewItems: TListViewItems
- Left = 216
- Top = 139
- ActiveControl = TreeView
- BorderStyle = bsDialog
- Caption = 'ListView Eintr�ge-Editor'
- ClientHeight = 164
- ClientWidth = 442
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- Position = poScreenCenter
- OnCreate = FormCreate
- OnDestroy = FormDestroy
- PixelsPerInch = 96
- TextHeight = 13
- object GroupBox1: TGroupBox
- Left = 7
- Top = 5
- Width = 264
- Height = 115
- Caption = '&Eintr�ge'
- TabOrder = 0
- object New: TButton
- Left = 135
- Top = 20
- Width = 122
- Height = 25
- Caption = '&Neuer Eintrag'
- Default = True
- TabOrder = 1
- OnClick = NewClick
- end
- object Delete: TButton
- Left = 135
- Top = 81
- Width = 122
- Height = 25
- Caption = '&L�schen'
- TabOrder = 3
- OnClick = DeleteClick
- end
- object TreeView: TTreeView
- Left = 9
- Top = 13
- Width = 121
- Height = 97
- DragMode = dmAutomatic
- HideSelection = False
- Indent = 19
- Items.Data = {00000000}
- OnEdited = TreeViewEdited
- OnChanging = TreeViewChanging
- OnChange = TreeViewChange
- ParentColor = False
- TabOrder = 0
- OnDragDrop = TreeViewDragDrop
- OnDragOver = TreeViewDragOver
- end
- object NewSub: TButton
- Left = 135
- Top = 51
- Width = 122
- Height = 25
- Caption = 'Neuer &Untereintrag'
- TabOrder = 2
- OnClick = NewSubClick
- end
- end
- object PropGroupBox: TGroupBox
- Left = 274
- Top = 5
- Width = 162
- Height = 115
- Caption = 'Eigenschaften des Eintrags'
- TabOrder = 1
- object Label1: TLabel
- Left = 7
- Top = 25
- Width = 66
- Height = 13
- Caption = 'Be&schriftung:'
- FocusControl = Text
- end
- object Label2: TLabel
- Left = 7
- Top = 53
- Width = 61
- Height = 13
- Caption = 'Bild-Inde&x:'
- FocusControl = Image
- end
- object Label3: TLabel
- Left = 8
- Top = 82
- Width = 62
- Height = 13
- Caption = 'Lage-&Index:'
- FocusControl = StateImage
- end
- object Text: TEdit
- Left = 76
- Top = 21
- Width = 79
- Height = 21
- TabOrder = 0
- OnChange = ValueChange
- OnExit = TextExit
- end
- object Image: TEdit
- Left = 76
- Top = 49
- Width = 39
- Height = 21
- TabOrder = 1
- OnChange = ValueChange
- OnExit = ImageExit
- end
- object StateImage: TEdit
- Left = 76
- Top = 78
- Width = 39
- Height = 21
- TabOrder = 2
- OnChange = ValueChange
- OnExit = StateImageExit
- end
- end
- object Button4: TButton
- Left = 107
- Top = 132
- Width = 75
- Height = 25
- Caption = 'OK'
- ModalResult = 1
- TabOrder = 2
- end
- object Cancel: TButton
- Left = 192
- Top = 132
- Width = 75
- Height = 25
- Cancel = True
- Caption = 'Abbrechen'
- ModalResult = 2
- TabOrder = 3
- end
- object Apply: TButton
- Left = 276
- Top = 132
- Width = 75
- Height = 25
- Caption = '�&bernehmen'
- TabOrder = 4
- OnClick = ApplyClick
- end
- object Button7: TButton
- Left = 361
- Top = 131
- Width = 75
- Height = 25
- Caption = '&Hilfe'
- TabOrder = 5
- OnClick = Button7Click
- end
- end
-